﻿Public Class BEpatrocinador

#Region "Declaración de variables"

    Private codPatrocinador As Integer
    Private codContacto As Integer
    Private nombre As String 
    Private telefono As Integer
    Private mail As String
    Private web As String

#End Region

    Sub New()
    End Sub

    Sub New(ByVal pCodPatrocinador As Object, _
            ByVal pNombre As Object, _
            ByVal pContacto As Object, _
            ByVal pTelefono As Object, _
            ByVal pMail As Object, _
            ByVal pWeb As Object)

        Me._codPatrocinador = pCodPatrocinador
        Me._nombre = pNombre
        Me._Codcontacto = pContacto
        Me._telefono = pTelefono
        Me._mail = pMail
        Me._web = pWeb

    End Sub


    Public Property _codPatrocinador() As Integer
        Get
            Return Me.codPatrocinador
        End Get
        Set(ByVal value As Integer)
            Me.codPatrocinador = value
        End Set
    End Property

    Public Property _codcontacto() As Integer
        Get
            Return Me.codContacto
        End Get
        Set(ByVal value As Integer)
            Me.codContacto = value
        End Set
    End Property

    Public Property _nombre() As String
        Get
            Return Me.nombre
        End Get
        Set(ByVal value As String)
            Me.nombre = value
        End Set
    End Property


    Public Property _telefono() As Integer
        Get
            Return Me.telefono
        End Get
        Set(ByVal value As Integer)
            Me.telefono = value
        End Set
    End Property


    Public Property _mail() As String
        Get
            Return Me.mail
        End Get
        Set(ByVal value As String)
            Me.mail = value
        End Set
    End Property


    Public Property _web() As String
        Get
            Return Me.web
        End Get
        Set(ByVal value As String)
            Me.web = value
        End Set
    End Property

End Class
